Windows 6-Pak - Disc 6/Windows 6-Pak (InfoMagic) (Disc 6) (1999).ISO/Text-Editors/CTextE3.EXE/Textedit.exe/0/RCDATA/TFRAMEFORM/TFRAMEFORM.txt

Text File | 1998-07-25 | 17KB | 531 lines

object FrameForm: TFrameForm
  Left = 174
  Top = 188
  Width = 578
  Height = 224
  Hint = 'Castillo TextEditor'
  Caption = 'Castillo TextEditor'
  Color = clAppWorkSpace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  FormStyle = fsMDIForm
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poDefault
  WindowMenu = Window1
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object StatusBar1: TStatusBar
    Left = 0
    Top = 158
    Width = 570
    Height = 20
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Panels = <
      item
        Width = 200
      end
      item
        Alignment = taCenter
        Width = 50
      end
      item
        Alignment = taCenter
        Width = 50
      end
      item
        Alignment = taCenter
        Width = 50
      end>
    ParentFont = False
    SimplePanel = False
  end
  object Toolbar971: TToolbar97
    Left = 22
    Top = 30
    Width = 259
    Height = 52
    Caption = 'Toolbar'
    CloseButton = False
    OnDockChanged = Toolbar971DockChanged
    object cmbtn1: TToolbarButton97
      Left = 4
      Top = 2
      Width = 25
      Height = 25
      Hint = 'New Text File...'
      Glyph.Data = {
        4E010000424D4E01000000000000760000002800000013000000120000000100
        040000000000D80000000000000000000000100000001000000000000000C0C0
        C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
        1111111000001111111111111111111000001111111111111111111000001110
        0000000000111110000011102222222220111110000011102222222220111110
        0000111022222222201111100000111022222222201111100000111022222222
        2011111000001110222222222011111000001110222222222011111000001110
        2222222220111110000011102222220000111110000011102222220201111110
        0000111022222200111111100000111000000001111111100000111111111111
        111111100000111111111111111111100000}
      ParentShowHint = False
      ShowHint = True
      OnClick = NewChild
    end
    object cmbtn2: TToolbarButton97
      Left = 35
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Open Existing Text File...'
      Glyph.Data = {
        4E010000424D4E01000000000000760000002800000013000000120000000100
        040000000000D800000000000000000000001000000010000000000000000084
        8400C0C0C00000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
        2222222000002222222222222222222000002222222222222222222000002000
        0000000022222220000020011111111102222220000020301111111110222220
        0000204301111111110222200000203430111111111022200000204343000000
        0000022000002034343434302222222000002043434343402222222000002034
        3000000022222220000022000222222220002220000022222222222222002220
        0000222222222022202022200000222222222200022222200000222222222222
        222222200000222222222222222222200000}
      ParentShowHint = False
      ShowHint = True
      OnClick = OpenChild
    end
    object cmbtn3: TToolbarButton97
      Left = 85
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Save Text File'
      Enabled = False
      Glyph.Data = {
        4E010000424D4E01000000000000760000002800000013000000120000000100
        040000000000D800000000000000000000001000000010000000000000000084
        8400C0C0C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
        2222222000002222222222222222222000002220000000000000222000002201
        1000000330102220000022011000000330102220000022011000000330102220
        0000220110000000001022200000220111111111111022200000220110000000
        0110222000002201033333333010222000002201033333333010222000002201
        0333333330102220000022010333333330102220000022010333333330002220
        0000220103333333303022200000220000000000000022200000222222222222
        222222200000222222222222222222200000}
      ParentShowHint = False
      ShowHint = True
      OnClick = Save1Click
    end
    object speedbutton1: TToolbarButton97
      Left = 60
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Delete Text File'
      Enabled = False
      Glyph.Data = {
        5A010000424D5A01000000000000760000002800000014000000130000000100
        040000000000E40000000000000000000000100000001000000000000000C6C6
        C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
        1111111100001111111111111111111100001111111111111111111100001111
        1011111111110111000011110001111111111111000011110000111111101111
        0000111110001111110111110000111111000111100111110000111111100011
        0011111100001111111100000111111100001111111110001111111100001111
        1111000001111111000011111110001100111111000011111000011110011111
        0000111100001111110011110000111100011111111101110000111111111111
        111111110000111111111111111111110000111111111111111111110000}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton1Click
    end
    object cmbtn4: TToolbarButton97
      Left = 116
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Print Text File'
      Enabled = False
      Glyph.Data = {
        4E010000424D4E01000000000000760000002800000013000000120000000100
        040000000000D800000000000000000000001000000010000000000000008484
        8400C0C0C000C6C6C60000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
        2222222000002222222222222222222000002220000000000022222000002203
        3333333303022220000020000000000000302220000020333333444330002220
        0000203333331113303022200000200000000000003302200000203333333333
        0303022000002200000000003030022000002220555555550303022000002222
        0500000500002220000022220555555550222220000022222050000050222220
        0000222220555555550222200000222222000000000222200000222222222222
        222222200000222222222222222222200000}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton7Click
    end
    object cmbtn8: TToolbarButton97
      Left = 147
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Undo...'
      Enabled = False
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000001000000010000000000000008484
        8400C0C0C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
        2222222222222222222222222222222222222222222222222222222222222221
        0222220000022222012222000022222220222200022222222022220020222222
        2022220222002222012222222222000012222222222222222222222222222222
        222222222222222222222222222222222222}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton8Click
    end
    object cmbtn6: TToolbarButton97
      Left = 197
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Copy Selection to Clipboard'
      Enabled = False
      Glyph.Data = {
        4E010000424D4E01000000000000760000002800000013000000120000000100
        040000000000D80000000000000000000000100000001000000000000000C0C0
        C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
        1111111000001111111111111111111000001111111111111111111000001111
        1110000000001110000011111110222222201110000011111110200000201110
        0000100000002222222011100000102222202000002011100000102000002222
        2220111000001022222020020000111000001020000022220201111000001022
        2220222200111110000010200200000001111110000010222202011111111110
        0000102222001111111111100000100000011111111111100000111111111111
        111111100000111111111111111111100000}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton5Click
    end
    object cmbtn5: TToolbarButton97
      Left = 172
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Cut Selection to Clipboard'
      Enabled = False
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        040000000000800000000000000000000000100000001000000000000000FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111
        1111111100111111111111101101100111111110110101101111111011010110
        1111111100010110111111111101000111111111110001111111111111101111
        1111111111000111111111111101011111111111100100111111111110111011
        1111111110111011111111111011101111111111111111111111}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton4Click
    end
    object cmbtn7: TToolbarButton97
      Left = 222
      Top = 2
      Width = 25
      Height = 25
      Hint = 'Paste from Clipboard'
      Enabled = False
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        00000084840084848400FFFFFF00C0C0C00000FFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00444444444444
        4444444444111111111140000017777777710323231711111171023232177777
        7771032323171117111102323217777717140323231777771144023232111111
        1044032323232323204402300000000330440330555555032044023206006032
        3044400000660000044444444000044444444444444444444444}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton6Click
    end
    object ToolbarSep971: TToolbarSep97
      Left = 29
      Top = 2
      Width = 6
      Height = 25
    end
    object ToolbarSep972: TToolbarSep97
      Left = 141
      Top = 2
      Width = 6
      Height = 25
    end
    object ToolbarSep973: TToolbarSep97
      Left = 110
      Top = 2
      Width = 6
      Height = 25
    end
  end
  object Dock972: TDock97
    Left = 0
    Top = 9
    Width = 9
    Height = 140
    BoundLines = [blLeft]
    Position = dpLeft
  end
  object Dock973: TDock97
    Left = 561
    Top = 9
    Width = 9
    Height = 140
    BoundLines = [blRight]
    Position = dpRight
  end
  object Dock974: TDock97
    Left = 0
    Top = 149
    Width = 570
    Height = 9
    BoundLines = [blBottom]
    Position = dpBottom
  end
  object Dock971: TDock97
    Left = 0
    Top = 0
    Width = 570
    Height = 9
    BoundLines = [blTop]
  end
  object ColorGrid1: TColorGrid
    Left = 235
    Top = 39
    Width = 100
    Height = 100
    TabOrder = 6
    Visible = False
  end
  object ColorGrid2: TColorGrid
    Left = 373
    Top = 41
    Width = 100
    Height = 100
    TabOrder = 7
    Visible = False
  end
  object OpenFileDialog: TOpenDialog
    Filter =
      ' All Files (*.*) | *.*|Text Files| *.txt|Source Files|*.html; *.' +
      'htm;*.bas;*.c;*.pas'
    Options = [ofHideReadOnly, ofAllowMultiSelect]
    Left = 309
    Top = 123
  end
  object MainMenu1: TMainMenu
    Left = 189
    Top = 125
    object File1: TMenuItem
      Caption = '&File'
      object New1: TMenuItem
        Caption = '&New'
        Hint = 'New Text File'
        ShortCut = 16462
        OnClick = NewChild
      end
      object Open1: TMenuItem
        Caption = '&Open...'
        Hint = 'Open an Existing Text File'
        ShortCut = 16463
        OnClick = OpenChild
      end
      object N15: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        Hint = 'Exit Castillo TextEditor'
        OnClick = Exit1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object N2: TMenuItem
        Caption = ' '
        OnClick = N2Click
      end
      object N3: TMenuItem
        Caption = ' '
        OnClick = N3Click
      end
      object N4: TMenuItem
        Caption = ' '
        OnClick = N4Click
      end
      object N5: TMenuItem
        Caption = ' '
        OnClick = N5Click
      end
      object N6: TMenuItem
        Caption = ' '
        OnClick = N6Click
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      GroupIndex = 9
      object Tile1: TMenuItem
        Caption = '&Tile'
        Hint = 'Tile Opened Documents'
        OnClick = Tile1Click
      end
      object Cascade1: TMenuItem
        Caption = '&Cascade'
        Hint = 'Cascade Opened Documents'
        OnClick = Cascade1Click
      end
      object ArrangeIcons1: TMenuItem
        Caption = '&Arrange Icons'
        Hint = 'Arrange Icons'
        OnClick = ArrangeIcons1Click
      end
    end
    object Help1: TMenuItem
      Caption = 'Help'
      GroupIndex = 9
      object UsingCastilloTextEditor1: TMenuItem
        Caption = 'Using Castillo TextEditor...'
        ShortCut = 112
        OnClick = UsingCastilloTextEditor1Click
      end
      object N9: TMenuItem
        Caption = '-'
      end
      object CastilloBuenoSystemsHomePage1: TMenuItem
        Caption = 'Castillo Bueno Systems Home Page...'
        Hint = 'Castillo Bueno Systems Home Page...'
        OnClick = CastilloBuenoSystemsHomePage1Click
      end
      object PurchaseCastilloTextEditorOnline1: TMenuItem
        Caption = 'Purchase Castillo TextEditor Online...'
        Hint = 'Purchase Castillo TextEditor Online...'
        OnClick = PurchaseCastilloTextEditorOnline1Click
      end
      object N8: TMenuItem
        Caption = '-'
      end
      object About1: TMenuItem
        Caption = 'About...'
        Hint = 'About Castillo TextEditor...'
        OnClick = About1Click
      end
    end
  end
  object PrintDialog1: TPrintDialog
    Left = 251
    Top = 124
  end
  object SaveFileDialog: TSaveDialog
    Filter =
      'All Files|*.*|Text Files|*.txt|Source Files|*.c; *.htm;*.html;*.' +
      'bas;*.pas'
    Left = 158
    Top = 126
  end
  object FindDialog1: TFindDialog
    Left = 220
    Top = 124
  end
  object PopupMenu1: TPopupMenu
    AutoPopup = False
    Left = 341
    Top = 123
    object Find1: TMenuItem
      Caption = 'Find...'
      OnClick = Find1Click
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object Replace1: TMenuItem
      Caption = 'Replace...'
      OnClick = Replace1Click
    end
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 127
    Top = 126
  end
  object LMDShapeHint1: TLMDShapeHint
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clInfoText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Position = hpBelowRight
    Style = hsNoseRect
    Left = 375
    Top = 125
  end
  object LMDAboutDlg1: TLMDAboutDlg
    Appname = 'Castillo TextEditor'
    CaptionTitle = 'Castillo TextEditor'
    Copyright = '(C) 1997-1998, Castillo Bueno Systems. All Rights Reserved.'
    Description =
      'Castillo TextEditor: A cost efective solution to all your text e' +
      'diting neeeds.'
    Effect = deExplodeExt
    Jump = 'http://www.castillobueno.com'
    Version = '3.00c'
    Left = 403
    Top = 125
  end
  object IniOut1: TIniOut
    Items.Strings = (
      'FrameForm;Height;;SOFTWARE\Castillo\Text Editor;Height;1;0'
      'FrameForm;Left;;SOFTWARE\Castillo\Text Editor;Left;1;0'
      'FrameForm;Width;;SOFTWARE\Castillo\Text Editor;Width;1;0'
      'FrameForm;Top;;SOFTWARE\Castillo\Text Editor;Top;1;0'

        'FrameForm;WindowState;wsNormal;SOFTWARE\Castillo\Text Editor;WSt' +
        'ate;1;0'
      'Toolbar971;DockedTo;;SOFTWARE\Castillo\Text Editor;ToolbarTo;1;0'

        'ColorGrid1;BackgroundIndex;;SOFTWARE\Castillo\Text Editor;BackCo' +
        'lor;1;0'

        'ColorGrid1;ForegroundIndex;;SOFTWARE\Castillo\Text Editor;ForeCo' +
        'lor;1;0'

        'ColorGrid2;BackgroundIndex;;SOFTWARE\Castillo\Text Editor;String' +
        'Color;1;0'

        'ColorGrid2;ForegroundIndex;;SOFTWARE\Castillo\Text Editor;Commen' +
        'tColor;1;0')
    RegistryRoot = LOCAL_MACHINE
    Left = 281
    Top = 121
  end
  object LimitMe1: TLimitMe
    Bija = 'CastilloTextEditor'
    Terminate = True
    BeforeTerminate = LimitMe1BeforeTerminate
    Left = 13
    Top = 117
  end
  object Timer2: TTimer
    OnTimer = Timer2Timer
    Left = 43
    Top = 117
  end
end